Chip 1997 December/CHIPNET Aralık 1997.iso/oyun/elf.exe/ELF.EXE/0/RCDATA/TPCDLG/TPCDLG.txt

Text File | 1997-02-13 | 6KB | 194 lines

object PCDlg: TPCDlg
  Left = 228
  Top = 115
  ActiveControl = PCLB
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Known PCs'
  ClientHeight = 218
  ClientWidth = 296
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object OKBtn: TBitBtn
    Left = 68
    Top = 184
    Width = 77
    Height = 27
    TabOrder = 1
    Kind = bkOK
    Margin = 2
    Style = bsNew
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 152
    Top = 184
    Width = 77
    Height = 27
    TabOrder = 2
    Kind = bkCancel
    Margin = 2
    Style = bsNew
    Spacing = -1
    IsControl = True
  end
  object Panel1: TPanel
    Left = 4
    Top = 4
    Width = 289
    Height = 173
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 136
      Top = 36
      Width = 46
      Height = 13
      Caption = '&Extension'
      FocusControl = Extension
    end
    object Label2: TLabel
      Left = 136
      Top = 12
      Width = 28
      Height = 13
      Caption = '&Name'
      FocusControl = Name
    end
    object Label3: TLabel
      Left = 136
      Top = 60
      Width = 23
      Height = 13
      Caption = '&Infos'
      FocusControl = Info
    end
    object PCLB: TListBox
      Left = 8
      Top = 8
      Width = 121
      Height = 157
      ItemHeight = 13
      TabOrder = 0
      OnClick = PCLBClick
      OnDblClick = PCLBDblClick
    end
    object Add: TBitBtn
      Left = 156
      Top = 84
      Width = 109
      Height = 25
      Caption = '&New'
      TabOrder = 4
      OnClick = AddClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
        0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
        33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
      Style = bsNew
    end
    object SavePC: TBitBtn
      Left = 156
      Top = 112
      Width = 109
      Height = 25
      Caption = '&Update list'
      Enabled = False
      TabOrder = 5
      OnClick = SavePCClick
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDD0000000DDDDDDDDDDDDDDDDD0000000DD00000000000DDDD0000000DD0F
        FFFFFFFF0DDDD0000000DD0F0000000F0DDDD0000000DD0FFFFFFFFF0DD4D000
        0000DD0F00000FFF8D4DD0000000DD0FFFFFFF4F74DDD0000000DD0F00000F44
        4DDDD0000000DD0FFFFFFF444DDDD0000000DD0FF0000F4444DDD0000000DD0F
        FFFFFFFFDDDDD0000000DD0F0000000F0DDDD0000000DD0FFFFFFFFF0DDDD000
        0000DD00000000000DDDD0000000DDDDDDDDDDDDDDDDD0000000DDDDDDDDDDDD
        DDDDD0000000}
      Style = bsNew
    end
    object Extension: TEdit
      Left = 188
      Top = 32
      Width = 37
      Height = 21
      Hint =
        'The extension to be used for MACRO.* and'#13'VARS.* (the files that ' +
        'describe the PC)'
      MaxLength = 3
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnChange = ExtensionChange
    end
    object Name: TEdit
      Left = 168
      Top = 8
      Width = 113
      Height = 21
      Hint = 'PC'#39's name'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnChange = NameChange
    end
    object Info: TEdit
      Left = 164
      Top = 56
      Width = 117
      Height = 21
      Hint = 'Some extra info for your own use'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
    end
    object CreateFiles: TBitBtn
      Left = 156
      Top = 140
      Width = 109
      Height = 25
      Caption = 'CreateFiles'
      Enabled = False
      TabOrder = 6
      OnClick = CreateFilesClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
        7700333333337777777733333333008088003333333377F73377333333330088
        88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
        000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
        FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
        99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
      Style = bsNew
    end
  end
end